<%

Function torneio_emular_todos_torneios(conexao)

		str = "Select id FROM torneios_geral where status=1"
    		Set rs = conexao.Execute(str)	
		Do while not rs.eof
			torneio_emular_torneios(conexao, rs("id")
			rs.MoveNext
		Loop
						
End Function

Function torneio_emular_torneios(conexao, id)

		str = "Select id, criterio, status FROM torneios_geral where id="&id
    		Set rs = conexao.Execute(str)	
		
		
						
End Function

%>
